CLS
INPUT "n"; n
INPUT "x"; x
s = 1
fack = 1
FOR i = 1 TO n
s = s + (x * (LOG(EXP(5)))) ^ i / fack
NEXT i
PRINT s
f = s / .01
l = INT(f)
x = l * .01
PRINT x
Тестирование выполнено в программе QB64 ( Скачать )
CLS
INPUT "n"; n
INPUT "x"; x
s = 1
fack = 1
FOR i = 1 TO n
s = s + (x * (LOG(EXP(5)))) ^ i / fack
NEXT i
PRINT s
f = s / .01
l = INT(f)
x = l * .01
PRINT x
Тестирование выполнено в программе QB64 ( Скачать )